Profile of (eval 392)[Sub/Quote.pm:3]

Filename	(eval 392)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 14 statements in 317µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	13µs	106µs	JSON::Schema::Modern::Document::OpenAPI::BEGIN@7
1	1	1	6µs	6µs	Method::Generate::Accessor::_Generated::BEGIN@12.250
1	1	1	6µs	22µs	Method::Generate::Accessor::_Generated::BEGIN@39.251
0	0	0	0s	0s	JSON::Schema::Modern::Document::OpenAPI::_set_metaschema_uri

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	15µs			my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
3	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
5	1	1µs			my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
6					package JSON::Schema::Modern::Document::OpenAPI;
7	2	62µs	2	199µs	# spent 106µs (13+93) within JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 which was called: # once (13µs+93µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 106µs making 1 call to JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 # spent 93µs making 1 call to warnings::unimport
8					sub _set_metaschema_uri {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 6µs within Method::Generate::Accessor::_Generated::BEGIN@12.250 which was called: # once (6µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 1762;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	5µs			%^H = (
16					);
17	1	74µs	1	6µs	} # spent 6µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.250
18					# END quote_sub PRELUDE
19					scalar do { my $value = do {
20					local $Method::Generate::Accessor::CurrentAttribute = {
21					init_arg => undef(),
22					name => "metaschema_uri",
23					step => "coercion",
24					};
25					(my $_return),
26					(my $_error), (my $_old_error = $@);
27					(eval {
28					($@ = $_old_error),
29					($_return =
30					$coerce_for_metaschema_5furi->($_[1])),
31					1
32					} or
33					$_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34					($@ = $_old_error),
35					(defined $_error and CORE::die $_error);
36					$_return;
37					}
38					;
39	2	153µs	2	38µs	# spent 22µs (6+16) within Method::Generate::Accessor::_Generated::BEGIN@39.251 which was called: # once (6µs+16µs) by Sub::Quote::_clean_eval at line 39 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }), # spent 22µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.251 # spent 16µs making 1 call to warnings::unimport
40					($_[0]->{"metaschema_uri"} = $value),
41					($_[0]->{"metaschema_uri"}),
42					} }
43	1	1µs			$$_UNQUOTED = \&_set_metaschema_uri;
44					}
45	1	5µs			1;
46
47					;